﻿Imports MICROFORMA.BEL
Imports MICROFORMA.DAL

Public Class EscanerBL
    Private EscanerDA As EscanerDA = Nothing

    Public Sub New()
        EscanerDA = New EscanerDA
    End Sub
    Public Function GetListAll() As DataTable
        Return EscanerDA.ListAll()
    End Function
    Public Function GetItemEscaner(ByVal IdEscaner As Integer) As DataTable
        Return EscanerDA.ListAllItem(IdEscaner)
    End Function
    Public Function Eliminar(ByVal IdEscaner As Integer) As String
        Return EscanerDA.Eliminar(IdEscaner)
    End Function
    Public Function Actualizar(ByVal escanerBE As EscanerBE) As String
        Return EscanerDA.Actualizar(escanerBE)
    End Function
    Public Function Add(ByVal escanerBE As EscanerBE) As String
        Return EscanerDA.Add(escanerBE)
    End Function

End Class
